﻿Public Class ParentForm
    Protected Friend ProcessCotrol As New CPUusageControl
    Friend widgetsform1 As WidgetsForm



    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TabPage3.Controls.Add(ProcessCotrol)
    End Sub

    Private Sub CPUToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

        'Dim CpuForm As CpuForm
        'CpuForm = New CpuForm()
        'CpuForm.Show()
        'TabControl1.SelectedIndex = 2

    End Sub

    Private Sub WidgetsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

        Dim widgetsForm As WidgetsForm
        widgetsForm = New WidgetsForm()
        widgetsForm.Show()
        'widgetsForm = Nothing

    End Sub

    Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        'Me.Close()
    End Sub

    Private Sub DiscToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        'Dim DiskForm As DiskForm
        'DiskForm = New DiskForm()
        'DiskForm.Show()
        'TabControl1.SelectedIndex = 0
    End Sub

    Private Sub TopXProcessesToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        'Dim topXprForm As topXprForm
        'topXprForm = New topXprForm()
        'topXprForm.Show()
        'TabControl1.SelectedIndex = 1
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim widgetsForm As New WidgetsForm
        widgetsForm.Show()
    End Sub

    
End Class
